(apropos-print): Don't do where-is on self-insert-command.

diff --git a/lisp/apropos.el b/lisp/apropos.el
index b490b8173bac7af7d3e6ecb84ab1d214e84477c7..3889655ff994aaa86490c174f337d85e2a7e7e3c 100644 (file)
--- a/lisp/apropos.el
+++ b/lisp/apropos.el
@@ -908,6 +908,7 @@ If non-nil TEXT is a string that will be printed as a heading."
          ;; Calculate key-bindings if we want them.
          (and do-keys
               (commandp symbol)
+              (not (eq symbol 'self-insert-command))
               (indent-to 30 1)
               (if (let ((keys
                          (save-excursion